ReachSediment Derived Type

type, public :: ReachSediment


Components

Type Visibility Attributes Name Initial
real(kind=float), public :: area

area drained by end section [m2]

real(kind=float), public :: d50

mean sediment size [mm]

integer, public :: i0

__beginning of reach

integer, public :: i1

__end of reach

integer, public :: id
integer, public :: j0

/ local reference system

integer, public :: j1

/

real(kind=float), public :: length

reach length [m]

integer, public :: ncells

number of cells in a reach

integer, public :: order

Horton-Sthraler order

integer(kind=short), public :: routingMethod
real(kind=float), public :: slope

average reach slope [m/m]

real(kind=float), public :: x0

__beginning of reach

real(kind=float), public :: x1

__end of reach

real(kind=float), public :: y0

/ spatial coordinate

real(kind=float), public :: y1

/


Source Code

TYPE ReachSediment
  INTEGER :: id
	!====================================================
	REAL(KIND = float) :: x0	!!\__beginning of reach
	REAL(KIND = float) :: y0	!!/                     spatial coordinate
	REAL(KIND = float) :: x1	!!\__end of reach
	REAL(KIND = float) :: y1	!!/
	!====================================================
	INTEGER :: i0	!!\__beginning of reach
	INTEGER :: j0	!!/                                 local reference system
	INTEGER :: i1	!!\__end of reach
	INTEGER :: j1	!!/
	!====================================================
	INTEGER :: ncells !!number of cells in a reach
	INTEGER :: order !! Horton-Sthraler order
	REAL(KIND = float) :: slope	!! average reach slope [m/m]
	REAL(KIND = float) :: length	!!reach length [m]
	REAL(KIND = float) :: area	!! area drained by end section [m2]
  REAL(KIND = float) :: d50  !!mean sediment size [mm]	
  INTEGER(KIND = short) :: routingMethod
END TYPE ReachSediment